
function replace(r,start,end){
    // 将 F,AD,AF,AG,AH,AI,AJ,AK列的值进行替换，不许分大小写
	Sheets.Item(1).Range("F"+r).Value2 = Sheets.Item(1).Range("F"+r).Value2.replaceAll(start,end)
	Sheets.Item(1).Range("AD"+r).Value2 = Sheets.Item(1).Range("AD"+r).Value2.replaceAll(start,end)
	Sheets.Item(1).Range("AF"+r).Value2 = Sheets.Item(1).Range("AF"+r).Value2.replaceAll(start,end)
	Sheets.Item(1).Range("AG"+r).Value2 = Sheets.Item(1).Range("AG"+r).Value2.replaceAll(start,end)
	Sheets.Item(1).Range("AH"+r).Value2 = Sheets.Item(1).Range("AH"+r).Value2.replaceAll(start,end)
	Sheets.Item(1).Range("AI"+r).Value2 = Sheets.Item(1).Range("AI"+r).Value2.replaceAll(start,end)
    Sheets.Item(1).Range("AJ"+r).Value2 = Sheets.Item(1).Range("AJ"+r).Value2.replaceAll(start,end)
    Sheets.Item(1).Range("AK"+r).Value2 = Sheets.Item(1).Range("AK"+r).Value2.replaceAll(start,end)
}



function Save_Effort(){
	var sheet = Application.ActiveSheet;
	var len = sheet.Cells(sheet.Rows.Count, 1).End(-4162).Row;
	for(let i = 3;i<=len;i++){
        //英语
		replace(i,'preservatives','');
        replace(i,'BPA','');
        replace(i,'anti-fouling','');
        replace(i,'anti-rust,','');
        //法语
        replace(i,'conservateurs','');
        replace(i,'antisalissure','');
        replace(i,'antirouille,','');
        //意大利语
        replace(i,'conservanti','');
        replace(i,'anti-sporco','');
        replace(i,'antiruggine,','');
        //西班牙
        replace(i,'conservantes','');
        replace(i,'antiincrustante','');
        replace(i,'antioxidante,','');
        //荷兰
        replace(i,'suiker of conserveermiddelen toe te voegen','');
        replace(i,'anti-aangroei','');
        replace(i,'anti-roest,','');
        //瑞典
        replace(i,'konserveringsmedel','');
        replace(i,'bottenskyddande','');
        replace(i,'rostskyddande,','');
        //波兰
        replace(i,'konserwantów','');
        replace(i,'antyporostowa','');
        replace(i,'antykorozyjna,','');
	}
}